home *** CD-ROM | disk | FTP | other *** search
Unknown | 2004-05-20 | 3.1 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| dexvert
| Delphi Borland Form (archive/borlandDelphiForm)
| magic
| Supported |
100%
| file
| Delphi compiled form 'TFilterList'
| default
| |
99%
| file
| data
| default
| |
100%
| TrID
| Borland Form (generic)
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 54 50 46 30 0b 54 46 69 | 6c 74 65 72 4c 69 73 74 |TPF0.TFi|lterList|
|00000010| 00 0a 46 69 6c 74 65 72 | 4c 69 73 74 01 08 54 56 |..Filter|List..TV|
|00000020| 65 72 73 69 6f 6e 00 07 | 56 65 72 73 69 6f 6e 02 |ersion..|Version.|
|00000030| 44 06 a7 0d 0a 54 68 69 | 73 20 69 73 20 61 20 54 |D....Thi|s is a T|
|00000040| 65 78 74 50 69 70 65 20 | 50 72 6f 20 66 69 6c 74 |extPipe |Pro filt|
|00000050| 65 72 20 66 69 6c 65 2c | 20 61 6e 20 61 70 70 6c |er file,| an appl|
|00000060| 69 63 61 74 69 6f 6e 20 | 66 6f 72 20 6d 61 6e 69 |ication |for mani|
|00000070| 70 75 6c 61 74 69 6e 67 | 20 61 6e 64 20 65 78 74 |pulating| and ext|
|00000080| 72 61 63 74 69 6e 67 20 | 74 65 78 74 20 66 69 6c |racting |text fil|
|00000090| 65 73 20 6f 66 20 61 6e | 79 20 73 69 7a 65 2e 20 |es of an|y size. |
|000000a0| 54 6f 20 66 69 6e 64 20 | 6f 75 74 20 6d 6f 72 65 |To find |out more|
|000000b0| 20 67 6f 20 74 6f 20 68 | 74 74 70 3a 2f 2f 77 77 | go to h|ttp://ww|
|000000c0| 77 2e 63 72 79 73 74 61 | 6c 73 6f 66 74 77 61 72 |w.crysta|lsoftwar|
|000000d0| 65 2e 63 6f 6d 2e 61 75 | 0d 0a 06 00 06 00 0c 89 |e.com.au|........|
|000000e0| 01 00 00 59 6f 75 20 63 | 61 6e 20 5b 54 68 65 20 |...You c|an [The |
|000000f0| 73 74 72 69 6e 67 20 74 | 6f 20 66 69 6e 64 5d 20 |string t|o find] |
|00000100| 74 79 70 65 20 73 61 6d | 70 6c 65 20 74 65 78 74 |type sam|ple text|
|00000110| 20 69 6e 20 0d 0a 74 68 | 65 20 54 72 69 61 6c 20 | in ..th|e Trial |
|00000120| 52 75 6e 20 49 6e 70 75 | 74 20 41 72 65 61 20 74 |Run Inpu|t Area t|
|00000130| 6f 0d 0a 74 65 73 74 20 | 69 66 20 79 6f 75 72 20 |o..test |if your |
|00000140| 66 69 6c 74 65 72 20 69 | 73 20 77 6f 72 6b 69 6e |filter i|s workin|
|00000150| 67 20 0d 0a 70 72 6f 70 | 65 72 6c 79 2e 20 43 6c |g ..prop|erly. Cl|
|00000160| 69 63 6b 20 74 68 65 20 | 5b 54 72 69 61 6c 20 52 |ick the |[Trial R|
|00000170| 75 6e 5d 0d 0a 62 75 74 | 74 6f 6e 20 5b 54 68 65 |un]..but|ton [The|
|00000180| 20 73 74 72 69 6e 67 20 | 74 6f 20 66 69 6e 64 5d | string |to find]|
|00000190| 20 62 65 6c 6f 77 20 74 | 6f 20 73 74 61 72 74 20 | below t|o start |
|000001a0| 74 68 65 20 74 65 73 74 | 2e 0d 0a 0d 0a 54 6f 20 |the test|.....To |
|000001b0| 63 6c 65 61 72 20 74 68 | 69 73 20 74 65 78 74 2c |clear th|is text,|
|000001c0| 20 6a 75 73 74 20 72 69 | 67 68 74 20 0d 0a 63 6c | just ri|ght ..cl|
|000001d0| 69 63 6b 20 69 74 20 61 | 6e 64 20 73 65 6c 65 63 |ick it a|nd selec|
|000001e0| 74 20 27 43 6c 65 61 72 | 20 45 6e 74 69 72 65 20 |t 'Clear| Entire |
|000001f0| 0d 0a 46 69 65 6c 64 27 | 20 66 72 6f 6d 20 74 68 |..Field'| from th|
|00000200| 65 20 6d 65 6e 75 2e 20 | 5b 54 68 65 20 73 74 72 |e menu. |[The str|
|00000210| 69 6e 67 20 74 6f 20 66 | 69 6e 64 5d 20 4d 6f 73 |ing to f|ind] Mos|
|00000220| 74 20 0d 0a 6f 66 20 54 | 65 78 74 50 69 70 65 27 |t ..of T|extPipe'|
|00000230| 73 20 66 69 65 6c 64 73 | 20 68 61 76 65 20 0d 0a |s fields| have ..|
|00000240| 73 69 6d 69 6c 61 72 20 | 68 65 6c 70 66 75 6c 20 |similar |helpful |
|00000250| 6d 65 6e 75 73 2e 0d 0a | 5b 54 68 65 20 73 74 72 |menus...|[The str|
|00000260| 69 6e 67 20 74 6f 20 66 | 69 6e 64 5d 01 06 39 3c |ing to f|ind]..9<|
|00000270| 41 64 64 20 66 69 6c 65 | 73 20 74 6f 20 74 68 69 |Add file|s to thi|
|00000280| 73 20 66 69 6c 65 20 6c | 69 73 74 20 62 79 20 64 |s file l|ist by d|
|00000290| 72 61 67 67 69 6e 67 20 | 61 6e 64 20 64 72 6f 70 |ragging |and drop|
|000002a0| 70 69 6e 67 3e 7c 4e 49 | 06 1f 3c 74 68 65 6d 20 |ping>|NI|..<them |
|000002b0| 66 72 6f 6d 20 57 69 6e | 64 6f 77 73 20 45 78 70 |from Win|dows Exp|
|000002c0| 6c 6f 72 65 72 3e 7c 4e | 49 06 03 7c 4e 41 00 08 |lorer>|N|I..|NA..|
|000002d0| 06 0c 74 65 78 74 70 69 | 70 65 2e 6c 6f 67 09 03 |..textpi|pe.log..|
|000002e0| f4 01 00 00 02 00 09 14 | 54 46 69 6c 74 65 72 43 |........|TFilterC|
|000002f0| 6f 6d 6d 65 6e 74 4f 62 | 6a 65 63 74 00 07 65 6e |ommentOb|ject..en|
|00000300| 61 62 6c 65 64 09 0a 4c | 69 73 74 4f 62 6a 65 63 |abled..L|istObjec|
|00000310| 74 09 00 00 02 01 08 0c | 54 49 6e 70 75 74 4f 62 |t.......|TInputOb|
|00000320| 6a 65 63 74 00 07 65 6e | 61 62 6c 65 64 09 0b 49 |ject..en|abled..I|
|00000330| 6e 70 75 74 4f 62 6a 65 | 63 74 09 08 02 01 02 01 |nputObje|ct......|
|00000340| 02 64 08 08 03 00 04 00 | 00 02 01 08 0e 54 43 6f |.d......|.....TCo|
|00000350| 6d 6d 65 6e 74 4f 62 6a | 65 63 74 00 07 65 6e 61 |mmentObj|ect..ena|
|00000360| 62 6c 65 64 09 0d 43 6f | 6d 6d 65 6e 74 4f 62 6a |bled..Co|mmentObj|
|00000370| 65 63 74 09 06 f3 54 68 | 69 73 20 66 69 6c 74 65 |ect...Th|is filte|
|00000380| 72 20 75 73 65 73 20 6f | 6e 65 20 56 42 53 63 72 |r uses o|ne VBScr|
|00000390| 69 70 74 20 74 6f 20 63 | 6f 75 6e 74 20 74 68 65 |ipt to c|ount the|
|000003a0| 20 6d 61 74 63 68 65 73 | 2c 20 61 6e 64 20 61 20 | matches|, and a |
|000003b0| 73 65 63 6f 6e 64 20 56 | 42 53 63 72 69 70 74 20 |second V|BScript |
|000003c0| 74 6f 20 6f 75 74 70 75 | 74 20 74 68 65 20 74 6f |to outpu|t the to|
|000003d0| 74 61 6c 20 6e 75 6d 62 | 65 72 20 6f 66 20 6d 61 |tal numb|er of ma|
|000003e0| 74 63 68 65 73 2e 0d 0a | 56 42 53 63 72 69 70 74 |tches...|VBScript|
|000003f0| 20 23 31 20 69 73 20 61 | 20 73 69 64 65 20 65 66 | #1 is a| side ef|
|00000400| 66 65 63 74 20 6f 66 20 | 62 65 69 6e 67 20 61 20 |fect of |being a |
|00000410| 73 75 62 20 66 69 6c 74 | 65 72 20 6f 66 20 74 68 |sub filt|er of th|
|00000420| 65 20 73 65 61 72 63 68 | 2f 72 65 70 6c 61 63 65 |e search|/replace|
|00000430| 20 66 69 6c 74 65 72 2c | 20 61 6e 64 20 73 6f 20 | filter,| and so |
|00000440| 6f 6e 6c 79 20 61 66 66 | 65 63 74 73 20 74 68 65 |only aff|ects the|
|00000450| 20 73 65 61 72 63 68 2f | 72 65 70 6c 61 63 65 20 | search/|replace |
|00000460| 72 65 73 75 6c 74 2e 0d | 0a 00 00 02 01 09 0d 54 |result..|.......T|
|00000470| 53 65 61 72 63 68 4f 62 | 6a 65 63 74 00 07 65 6e |SearchOb|ject..en|
|00000480| 61 62 6c 65 64 09 0c 53 | 65 61 72 63 68 4f 62 6a |abled..S|earchObj|
|00000490| 65 63 74 09 06 14 5b 54 | 68 65 20 73 74 72 69 6e |ect...[T|he strin|
|000004a0| 67 20 74 6f 20 66 69 6e | 64 5d 06 02 24 30 08 08 |g to fin|d]..$0..|
|000004b0| 08 02 00 08 08 03 00 10 | 02 02 08 08 08 09 08 08 |........|........|
|000004c0| 00 00 02 02 08 0d 54 53 | 63 72 69 70 74 4f 62 6a |......TS|criptObj|
|000004d0| 65 63 74 00 07 65 6e 61 | 62 6c 65 64 09 0c 53 63 |ect..ena|bled..Sc|
|000004e0| 72 69 70 74 4f 62 6a 65 | 63 74 09 0c aa 03 00 00 |riptObje|ct......|
|000004f0| 27 43 6f 75 6e 74 20 6d | 61 74 63 68 65 73 20 69 |'Count m|atches i|
|00000500| 6e 20 61 20 67 6c 6f 62 | 61 6c 20 76 61 72 69 61 |n a glob|al varia|
|00000510| 62 6c 65 0d 0a 0d 0a 27 | 43 61 6c 6c 65 64 20 66 |ble....'|Called f|
|00000520| 6f 72 20 65 76 65 72 79 | 20 6c 69 6e 65 20 69 6e |or every| line in|
|00000530| 20 74 68 65 20 66 69 6c | 65 0d 0a 66 75 6e 63 74 | the fil|e..funct|
|00000540| 69 6f 6e 20 70 72 6f 63 | 65 73 73 4c 69 6e 65 28 |ion proc|essLine(|
|00000550| 6c 69 6e 65 2c 20 45 4f | 4c 29 0d 0a 0d 0a 20 20 |line, EO|L).... |
|00000560| 27 69 6e 63 72 65 61 73 | 65 20 63 6f 75 6e 74 20 |'increas|e count |
|00000570| 69 6e 20 67 6f 62 61 6c | 20 76 61 72 69 61 62 6c |in gobal| variabl|
|00000580| 65 0d 0a 20 20 54 65 78 | 74 50 69 70 65 2e 73 65 |e.. Tex|tPipe.se|
|00000590| 74 47 6c 6f 62 61 6c 56 | 61 72 20 22 63 6f 75 6e |tGlobalV|ar "coun|
|000005a0| 74 22 2c 20 54 65 78 74 | 50 69 70 65 2e 67 65 74 |t", Text|Pipe.get|
|000005b0| 47 6c 6f 62 61 6c 56 61 | 72 28 20 22 63 6f 75 6e |GlobalVa|r( "coun|
|000005c0| 74 22 20 29 20 2b 20 31 | 20 0d 0a 20 20 27 72 65 |t" ) + 1| .. 're|
|000005d0| 63 6f 72 64 20 74 68 65 | 20 6d 61 74 63 68 65 64 |cord the| matched|
|000005e0| 20 73 74 72 69 6e 67 20 | 66 6f 72 20 6f 75 74 70 | string |for outp|
|000005f0| 75 74 20 69 6e 20 74 68 | 65 20 73 74 61 74 75 73 |ut in th|e status|
|00000600| 20 72 65 73 75 6c 74 73 | 20 6c 61 74 65 72 0d 0a | results| later..|
|00000610| 20 20 54 65 78 74 50 69 | 70 65 2e 73 65 74 47 6c | TextPi|pe.setGl|
|00000620| 6f 62 61 6c 56 61 72 20 | 22 73 74 72 69 6e 67 22 |obalVar |"string"|
|00000630| 2c 20 6c 69 6e 65 20 0d | 0a 0d 0a 20 20 27 4f 75 |, line .|... 'Ou|
|00000640| 74 70 75 74 20 74 68 65 | 20 6c 69 6e 65 20 6e 6f |tput the| line no|
|00000650| 72 6d 61 6c 6c 79 0d 0a | 20 20 70 72 6f 63 65 73 |rmally..| proces|
|00000660| 73 4c 69 6e 65 20 3d 20 | 6c 69 6e 65 20 26 20 45 |sLine = |line & E|
|00000670| 4f 4c 0d 0a 0d 0a 65 6e | 64 20 66 75 6e 63 74 69 |OL....en|d functi|
|00000680| 6f 6e 0d 0a 0d 0a 0d 0a | 27 43 61 6c 6c 65 64 20 |on......|'Called |
|00000690| 61 74 20 74 68 65 20 73 | 74 61 72 74 20 6f 66 20 |at the s|tart of |
|000006a0| 61 20 70 72 6f 63 65 73 | 73 69 6e 67 20 6a 6f 62 |a proces|sing job|
|000006b0| 20 2d 0d 0a 27 70 65 72 | 66 6f 72 6d 20 6f 6e 65 | -..'per|form one|
|000006c0| 2d 74 69 6d 65 20 69 6e | 69 74 69 61 6c 69 73 61 |-time in|itialisa|
|000006d0| 74 69 6f 6e 20 68 65 72 | 65 0d 0a 73 75 62 20 73 |tion her|e..sub s|
|000006e0| 74 61 72 74 4a 6f 62 28 | 29 0d 0a 20 20 54 65 78 |tartJob(|).. Tex|
|000006f0| 74 50 69 70 65 2e 73 65 | 74 47 6c 6f 62 61 6c 56 |tPipe.se|tGlobalV|
|00000700| 61 72 20 22 63 6f 75 6e | 74 22 20 2c 20 30 20 0d |ar "coun|t" , 0 .|
|00000710| 0a 65 6e 64 20 73 75 62 | 0d 0a 0d 0a 0d 0a 27 43 |.end sub|......'C|
|00000720| 61 6c 6c 65 64 20 61 74 | 20 74 68 65 20 65 6e 64 |alled at| the end|
|00000730| 20 6f 66 20 61 20 70 72 | 6f 63 65 73 73 69 6e 67 | of a pr|ocessing|
|00000740| 20 6a 6f 62 20 2d 0d 0a | 27 64 65 73 74 72 6f 79 | job -..|'destroy|
|00000750| 20 61 6e 79 20 64 65 63 | 6c 61 72 65 64 20 6f 62 | any dec|lared ob|
|00000760| 6a 65 63 74 73 20 68 65 | 72 65 0d 0a 73 75 62 20 |jects he|re..sub |
|00000770| 65 6e 64 4a 6f 62 28 29 | 0d 0a 20 20 27 64 6f 20 |endJob()|.. 'do |
|00000780| 6e 6f 74 68 69 6e 67 0d | 0a 65 6e 64 20 73 75 62 |nothing.|.end sub|
|00000790| 0d 0a 0d 0a 0d 0a 27 43 | 61 6c 6c 65 64 20 62 65 |......'C|alled be|
|000007a0| 66 6f 72 65 20 65 61 63 | 68 20 66 69 6c 65 20 69 |fore eac|h file i|
|000007b0| 73 20 6f 70 65 6e 65 64 | 20 2d 0d 0a 27 70 65 72 |s opened| -..'per|
|000007c0| 66 6f 72 6d 20 70 65 72 | 2d 66 69 6c 65 20 69 6e |form per|-file in|
|000007d0| 69 74 69 61 6c 69 73 61 | 74 69 6f 6e 20 68 65 72 |itialisa|tion her|
|000007e0| 65 0d 0a 66 75 6e 63 74 | 69 6f 6e 20 73 74 61 72 |e..funct|ion star|
|000007f0| 74 46 69 6c 65 28 29 0d | 0a 20 20 73 74 61 72 74 |tFile().|. start|
|00000800| 46 69 6c 65 20 3d 20 22 | 22 0d 0a 65 6e 64 20 66 |File = "|"..end f|
|00000810| 75 6e 63 74 69 6f 6e 0d | 0a 0d 0a 0d 0a 27 43 61 |unction.|.....'Ca|
|00000820| 6c 6c 65 64 20 62 65 66 | 6f 72 65 20 65 61 63 68 |lled bef|ore each|
|00000830| 20 66 69 6c 65 20 69 73 | 20 63 6c 6f 73 65 64 20 | file is| closed |
|00000840| 2d 0d 0a 27 66 6c 75 73 | 68 20 61 6c 6c 20 70 65 |-..'flus|h all pe|
|00000850| 6e 64 69 6e 67 20 66 69 | 6c 65 20 6f 75 74 70 75 |nding fi|le outpu|
|00000860| 74 20 68 65 72 65 0d 0a | 66 75 6e 63 74 69 6f 6e |t here..|function|
|00000870| 20 65 6e 64 46 69 6c 65 | 28 29 0d 0a 20 20 65 6e | endFile|().. en|
|00000880| 64 46 69 6c 65 20 3d 20 | 22 22 0d 0a 65 6e 64 20 |dFile = |""..end |
|00000890| 66 75 6e 63 74 69 6f 6e | 0d 0a 06 08 56 42 53 63 |function|....VBSc|
|000008a0| 72 69 70 74 02 1e 00 00 | 02 01 08 0d 54 53 63 72 |ript....|....TScr|
|000008b0| 69 70 74 4f 62 6a 65 63 | 74 00 07 65 6e 61 62 6c |iptObjec|t..enabl|
|000008c0| 65 64 09 0c 53 63 72 69 | 70 74 4f 62 6a 65 63 74 |ed..Scri|ptObject|
|000008d0| 09 0c 30 03 00 00 27 4f | 75 74 70 75 74 20 6d 61 |..0...'O|utput ma|
|000008e0| 74 63 68 20 63 6f 75 6e | 74 20 61 74 20 65 6e 64 |tch coun|t at end|
|000008f0| 0d 0a 0d 0a 66 75 6e 63 | 74 69 6f 6e 20 70 72 6f |....func|tion pro|
|00000900| 63 65 73 73 4c 69 6e 65 | 28 6c 69 6e 65 2c 20 45 |cessLine|(line, E|
|00000910| 4f 4c 29 0d 0a 20 20 70 | 72 6f 63 65 73 73 4c 69 |OL).. p|rocessLi|
|00000920| 6e 65 20 3d 20 6c 69 6e | 65 20 26 20 45 4f 4c 0d |ne = lin|e & EOL.|
|00000930| 0a 65 6e 64 20 66 75 6e | 63 74 69 6f 6e 0d 0a 0d |.end fun|ction...|
|00000940| 0a 0d 0a 27 43 61 6c 6c | 65 64 20 61 74 20 74 68 |...'Call|ed at th|
|00000950| 65 20 73 74 61 72 74 20 | 6f 66 20 61 20 70 72 6f |e start |of a pro|
|00000960| 63 65 73 73 69 6e 67 20 | 6a 6f 62 20 2d 0d 0a 27 |cessing |job -..'|
|00000970| 70 65 72 66 6f 72 6d 20 | 6f 6e 65 2d 74 69 6d 65 |perform |one-time|
|00000980| 20 69 6e 69 74 69 61 6c | 69 73 61 74 69 6f 6e 20 | initial|isation |
|00000990| 68 65 72 65 0d 0a 73 75 | 62 20 73 74 61 72 74 4a |here..su|b startJ|
|000009a0| 6f 62 28 29 0d 0a 20 20 | 27 64 6f 20 6e 6f 74 68 |ob().. |'do noth|
|000009b0| 69 6e 67 0d 0a 65 6e 64 | 20 73 75 62 0d 0a 0d 0a |ing..end| sub....|
|000009c0| 0d 0a 27 43 61 6c 6c 65 | 64 20 61 74 20 74 68 65 |..'Calle|d at the|
|000009d0| 20 65 6e 64 20 6f 66 20 | 61 20 70 72 6f 63 65 73 | end of |a proces|
|000009e0| 73 69 6e 67 20 6a 6f 62 | 20 2d 0d 0a 27 64 65 73 |sing job| -..'des|
|000009f0| 74 72 6f 79 20 61 6e 79 | 20 64 65 63 6c 61 72 65 |troy any| declare|
|00000a00| 64 20 6f 62 6a 65 63 74 | 73 20 68 65 72 65 0d 0a |d object|s here..|
|00000a10| 73 75 62 20 65 6e 64 4a | 6f 62 28 29 0d 0a 20 20 |sub endJ|ob().. |
|00000a20| 27 64 6f 20 6e 6f 74 68 | 69 6e 67 0d 0a 65 6e 64 |'do noth|ing..end|
|00000a30| 20 73 75 62 0d 0a 0d 0a | 0d 0a 27 43 61 6c 6c 65 | sub....|..'Calle|
|00000a40| 64 20 62 65 66 6f 72 65 | 20 65 61 63 68 20 66 69 |d before| each fi|
|00000a50| 6c 65 20 69 73 20 6f 70 | 65 6e 65 64 20 2d 0d 0a |le is op|ened -..|
|00000a60| 27 70 65 72 66 6f 72 6d | 20 70 65 72 2d 66 69 6c |'perform| per-fil|
|00000a70| 65 20 69 6e 69 74 69 61 | 6c 69 73 61 74 69 6f 6e |e initia|lisation|
|00000a80| 20 68 65 72 65 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 | here..f|unction |
|00000a90| 73 74 61 72 74 46 69 6c | 65 28 29 0d 0a 20 20 73 |startFil|e().. s|
|00000aa0| 74 61 72 74 46 69 6c 65 | 20 3d 20 22 22 0d 0a 65 |tartFile| = ""..e|
|00000ab0| 6e 64 20 66 75 6e 63 74 | 69 6f 6e 0d 0a 0d 0a 0d |nd funct|ion.....|
|00000ac0| 0a 27 43 61 6c 6c 65 64 | 20 62 65 66 6f 72 65 20 |.'Called| before |
|00000ad0| 65 61 63 68 20 66 69 6c | 65 20 69 73 20 63 6c 6f |each fil|e is clo|
|00000ae0| 73 65 64 20 2d 0d 0a 27 | 66 6c 75 73 68 20 61 6c |sed -..'|flush al|
|00000af0| 6c 20 70 65 6e 64 69 6e | 67 20 66 69 6c 65 20 6f |l pendin|g file o|
|00000b00| 75 74 70 75 74 20 68 65 | 72 65 0d 0a 66 75 6e 63 |utput he|re..func|
|00000b10| 74 69 6f 6e 20 65 6e 64 | 46 69 6c 65 28 29 0d 0a |tion end|File()..|
|00000b20| 0d 0a 20 20 63 6f 75 6e | 74 20 3d 20 54 65 78 74 |.. coun|t = Text|
|00000b30| 50 69 70 65 2e 67 65 74 | 47 6c 6f 62 61 6c 56 61 |Pipe.get|GlobalVa|
|00000b40| 72 28 20 22 63 6f 75 6e | 74 22 20 29 0d 0a 20 20 |r( "coun|t" ).. |
|00000b50| 73 74 72 20 3d 20 54 65 | 78 74 50 69 70 65 2e 67 |str = Te|xtPipe.g|
|00000b60| 65 74 47 6c 6f 62 61 6c | 56 61 72 28 20 22 73 74 |etGlobal|Var( "st|
|00000b70| 72 69 6e 67 22 20 29 0d | 0a 27 20 20 76 62 43 72 |ring" ).|.' vbCr|
|00000b80| 4c 66 20 3d 20 63 68 72 | 28 31 33 29 20 26 20 63 |Lf = chr|(13) & c|
|00000b90| 68 72 28 31 30 29 0d 0a | 0d 0a 20 20 65 6e 64 46 |hr(10)..|.. endF|
|00000ba0| 69 6c 65 20 3d 20 76 62 | 43 72 4c 66 20 26 20 76 |ile = vb|CrLf & v|
|00000bb0| 62 43 72 4c 66 20 26 20 | 63 6f 75 6e 74 20 26 20 |bCrLf & |count & |
|00000bc0| 22 20 6d 61 74 63 68 28 | 65 73 29 20 66 6f 75 6e |" match(|es) foun|
|00000bd0| 64 20 66 6f 72 20 74 68 | 65 20 66 69 6e 64 20 73 |d for th|e find s|
|00000be0| 74 72 69 6e 67 20 22 20 | 26 20 73 74 72 20 26 20 |tring " |& str & |
|00000bf0| 76 62 43 72 4c 66 0d 0a | 65 6e 64 20 66 75 6e 63 |vbCrLf..|end func|
|00000c00| 74 69 6f 6e 0d 0a 06 08 | 56 42 53 63 72 69 70 74 |tion....|VBScript|
|00000c10| 02 1e 00 00 02 01 08 0d | 54 4f 75 74 70 75 74 4f |........|TOutputO|
|00000c20| 62 6a 65 63 74 00 07 65 | 6e 61 62 6c 65 64 09 0c |bject..e|nabled..|
|00000c30| 4f 75 74 70 75 74 4f 62 | 6a 65 63 74 09 02 00 09 |OutputOb|ject....|
|00000c40| 02 01 08 06 04 2e 74 78 | 74 08 06 10 43 3a 5c 4d |......tx|t...C:\M|
|00000c50| 79 20 44 6f 63 75 6d 65 | 6e 74 73 5c 09 06 14 63 |y Docume|nts\...c|
|00000c60| 3a 5c 6d 65 72 67 65 66 | 69 6c 65 6e 61 6d 65 2e |:\mergef|ilename.|
|00000c70| 74 78 74 08 08 00 00 00 | 02 00 00 00 |txt.....|.... |
+--------+-------------------------+-------------------------+--------+--------+